home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #2 / Amiga Plus CD - 2004 - No. 02.iso / AmigaPlus / Tools / Development / AmigaTalk / prelude / File.p < prev    next >
Text File  |  2004-01-31  |  2KB  |  67 lines
  1. pTempVar <- <primitive 110 14 >
  2. <primitive 112 pTempVar 1  " write: " \
  3.   #( #[ 16r20 16r21 16rFA 16r02 16r84 16rF3 16rF5] \
  4.     #(  )) >
  5.  
  6. <primitive 112 pTempVar 2  " size " \
  7.   #( #[ 16r20 16rFA 16r01 16r86 16rF3 16rF5] \
  8.     #(  )) >
  9.  
  10. <primitive 112 pTempVar 3  " read " \
  11.   #( #[ 16r20 16rFA 16r01 16r83 16rF3 16rF5] \
  12.     #(  )) >
  13.  
  14. <primitive 112 pTempVar 4  " close " \
  15.   #( #[ 16r20 16rFA 16r01 16r8B 16rF2 16r5D 16rF3 16rF5] \
  16.     #(  )) >
  17.  
  18. <primitive 112 pTempVar 5  " open:for: " \
  19.   #( #[ 16r20 16r21 16r22 16rFA 16r03 16r82 16rF2 16rF5] \
  20.     #(  )) >
  21.  
  22. <primitive 112 pTempVar 6  " open: " \
  23.   #( #[ 16r20 16r21 16r30 16rFA 16r03 16r82 16rF2 16rF5] \
  24.     #( 'r'  )) >
  25.  
  26. <primitive 112 pTempVar 7  " next " \
  27.   #( #[ 16r20 16r0A 16r24 16rF3 16rF5] \
  28.     #(  )) >
  29.  
  30. <primitive 112 pTempVar 8  " first " \
  31.   #( #[ 16r20 16r50 16rB1 16rF3 16rF5] \
  32.     #(  )) >
  33.  
  34. <primitive 112 pTempVar 9  " currentKey " \
  35.   #( #[ 16r20 16rFA 16r01 16r88 16rF3 16rF5] \
  36.     #(  )) >
  37.  
  38. <primitive 112 pTempVar 10  " at:put: " \
  39.   #( #[ 16r20 16r21 16rFA 16r02 16r87 16rF2 16r20 16r22 16r0B 16r32 16rF3 \
  40.         16rF5] \
  41.     #(  )) >
  42.  
  43. <primitive 112 pTempVar 11  " at: " \
  44.   #( #[ 16r20 16r21 16rFA 16r02 16r87 16rF2 16r20 16r0A 16r24 16rF3 16rF5 \
  45.        ] \
  46.     #(  )) >
  47.  
  48. <primitive 112 pTempVar 12  " modeString " \
  49.   #( #[ 16r20 16r51 16rFA 16r02 16r85 16rF2 16rF5] \
  50.     #(  )) >
  51.  
  52. <primitive 112 pTempVar 13  " modeInteger " \
  53.   #( #[ 16r20 16r52 16rFA 16r02 16r85 16rF2 16rF5] \
  54.     #(  )) >
  55.  
  56. <primitive 112 pTempVar 14  " modeCharacter " \
  57.   #( #[ 16r20 16r50 16rFA 16r02 16r85 16rF2 16rF5] \
  58.     #(  )) >
  59.  
  60. <primitive 98 #File \
  61.   <primitive 97 #File #SequenceableCollection #AmigaTalk:General/File.st \
  62.    #(  ) \
  63.    #( #write: #size #read #close #open:for: #open: #next #first #currentKey  \
  64.        #at:put: #at: #modeString #modeInteger #modeCharacter  ) \
  65.   pTempVar 3 4 > #ordinary >
  66.  
  67.